home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-01-29 | 1.6 KB | 76 lines | [TEXT/MPS ] |
- {
- File: ToolIntf.p
-
- As of MPW 3.0, interface files were reorganized to more closely
- match "Inside Macintosh" reference books and be more consistant
- from language to language.
-
- Interfaces for the Macintosh toolbox calls are now found in the
- files included below. This file is provided for compatibility
- with old sources.
-
- Pascal Interface to the Macintosh Libraries
- Copyright Apple Computer, Inc. 1988
- All Rights Reserved
- }
-
- {$IFC UNDEFINED UsingIncludes}
- {$SETC UsingIncludes := 0}
- {$ENDC}
-
- {$IFC NOT UsingIncludes}
- UNIT ToolIntf;
- INTERFACE
- {$ENDC}
-
- {$IFC UNDEFINED UsingToolIntf}
- {$SETC UsingToolIntf := 1}
-
- {$I+}
- {$SETC ToolIntfIncludes := UsingIncludes}
- {$SETC UsingIncludes := 1}
- {$IFC UNDEFINED UsingEvents}
- {$I $$Shell(PInterfaces)Events.p}
- {$ENDC}
- {$IFC UNDEFINED UsingControls}
- {$I $$Shell(PInterfaces)Controls.p}
- {$ENDC}
- {$IFC UNDEFINED UsingDesk}
- {$I $$Shell(PInterfaces)Desk.p}
- {$ENDC}
- {$IFC UNDEFINED UsingWindows}
- {$I $$Shell(PInterfaces)Windows.p}
- {$ENDC}
- {$IFC UNDEFINED UsingTextEdit}
- {$I $$Shell(PInterfaces)TextEdit.p}
- {$ENDC}
- {$IFC UNDEFINED UsingDialogs}
- {$I $$Shell(PInterfaces)Dialogs.p}
- {$ENDC}
- {$IFC UNDEFINED UsingFonts}
- {$I $$Shell(PInterfaces)Fonts.p}
- {$ENDC}
- {$IFC UNDEFINED UsingLists}
- {$I $$Shell(PInterfaces)Lists.p}
- {$ENDC}
- {$IFC UNDEFINED UsingMenus}
- {$I $$Shell(PInterfaces)Menus.p}
- {$ENDC}
- {$IFC UNDEFINED UsingResources}
- {$I $$Shell(PInterfaces)Resources.p}
- {$ENDC}
- {$IFC UNDEFINED UsingScrap}
- {$I $$Shell(PInterfaces)Scrap.p}
- {$ENDC}
- {$IFC UNDEFINED UsingToolUtils}
- {$I $$Shell(PInterfaces)ToolUtils.p}
- {$ENDC}
- {$SETC UsingIncludes := ToolIntfIncludes}
-
- {$ENDC} { UsingToolIntf }
-
- {$IFC NOT UsingIncludes}
- END.
- {$ENDC}
-
-